home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 4 #3 / Commodore_Disk_User_Vol.4_3_1991_-.d64 / font grabber (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  526b  |  18 lines
  1. 90 rem" 19-jan-89
  2. 100 [153]"list          ********************
  3. 110 print"          *   font grabber   *
  4. 120 [153]"          * for  open system *
  5. 130 print"          ********************[154]
  6. 140 [139] [194](648)[178]204 [167] [137] 150
  7. 142 [153]" 'norsk' is used to configure
  8. 144 print"  cbm 64 for character in ram
  9. 146 _x"norsk
  10. 150 input"character-set";f$
  11. 160 if f$="" then print"[145][145][145]":goto150
  12. 170 print"[147]open system presents your new "
  13. 180 print"character-set [ \ ]";chr$(14)
  14. 220 adr=232*256:rem" under kernal
  15. 230 [159]1,8,0,f$:[151]185,0
  16. 240 [151]780,0:[151]782,adr[173]256:[151]781,adr[171][194](782)[172]256:[158]65493
  17. 250 [160]1:_e
  18.